www.gusucode.com > 良精ASP微博管理系统 V1.0 > 良精ASP微博管理系统 V1.0\code\Include\liangjingconn.asp

    
<!--#include file="../config.asp"-->
<%
if Session("_WTypeID") = "" then	'当前站点的类型
	Session("_WTypeID") = 1
	Session.Timeout = 900
end if
'On error resume next
	Set conn = Server.CreateObject("adodb.connection")
	Conn.Open"provider=microsoft.jet.oledb.4.0;data source="&Server.MapPath(""&SysRootDir&""&SiteDataPath&"")
If Err.number <> 0 then
	Response.Write(web_Name & "正在维护,请稍候访问,谢谢!....")
response.write err.description
	Response.End()
End if
%>